load ListOptionals

cell static,#numpoi&". "&local(@tag)&":"
SizeToFit
SetTab #hpos$+#cellWidth$+25
set height #defaultHeight$ alignment right

cell EditValue
set Width #rightMargin$-#hpos$-90
help local("Enter name for this point of interest")

Show _NOPOI

NewLine
tab 1
ClearTabs
SetTab #habs$+24
HMoveTo #leftSkip

Show _GPS
Show _CODE
  
gosub ListOptionals _PNOTE,_URL,"","",""
Show _OPTIONAL_TAGS,-1

ShowAll _URL "poi"
ShowAll _PNOTE
